home *** CD-ROM | disk | FTP | other *** search
/ Revista do CD-ROM 85 / CD-ROM 85 / CD-ROM 85.iso / aplic / 2sync / 2SyncSetup.exe / modules / em / panel / scripts / DefineButton2_102 / BUTTONCONDACTION on(release).as < prev    next >
Encoding:
Text File  |  2002-03-20  |  1.3 KB  |  50 lines
  1. on(release){
  2.    if(type ne "nx" and type ne "pv")
  3.    {
  4.       set("_level40/sound/lib:sound","153");
  5.       call("_level40/sound/lib:play");
  6.       tellTarget("_level50")
  7.       {
  8.          gotoAndStop("off");
  9.          play();
  10.       }
  11.       set("scrolllib:stop","1");
  12.       if(eval("boxsubbutton:selected") eq "1")
  13.       {
  14.          if(getTimer() - myClickTime < eval("_level0/data:DCTime"))
  15.          {
  16.             tellTarget("_level40/sound")
  17.             {
  18.                gotoAndStop("click");
  19.             }
  20.             set("../../../codelib:goboxsub",eval("../:n"));
  21.             set("_level100:mctrace","read " add read);
  22.             if(read eq "false" and eval("../../../codelib:boxtype") eq "out")
  23.             {
  24.                set("../../../codelib:fillsend","1");
  25.             }
  26.             else
  27.             {
  28.                set("../../../codelib:fillsend","0");
  29.             }
  30.             call("../../../codelib:readmail");
  31.          }
  32.          else
  33.          {
  34.             myClickTime = getTimer();
  35.          }
  36.          set("../:selectall","0");
  37.       }
  38.       setProperty("../../../../dragscrollcatch", _visible, "0");
  39.    }
  40.    else
  41.    {
  42.       set("../../../codelib:dir",type);
  43.       call("../../../codelib:step");
  44.       tellTarget("boxsubbutton")
  45.       {
  46.          gotoAndStop("deselect");
  47.       }
  48.    }
  49. }
  50.